      MODULE jfaze_I
      INTERFACE
!
      INTEGER FUNCTION JFAZE(I1,I2,I3,I4)
      INTEGER, INTENT(IN) :: I1, I2, I3, I4
      END FUNCTION
      END INTERFACE
      END MODULE
